home *** CD-ROM | disk | FTP | other *** search
/ Shareware Grab Bag / Shareware Grab Bag.iso / 007 / boosters.arc / FSTRHEAP.PAS < prev    next >
Pascal/Delphi Source File  |  1985-11-03  |  429b  |  10 lines

  1. { -----------------------------------------
  2.   FSTRHEAP searches Page on the heap for
  3.   the first occurrence of S.  If S found,
  4.   FstrHeap sets X,Y to the address of S[1].
  5.   If not found, X = 0.
  6.   ----------------------------------------- }
  7. Procedure FstrHeap ( Page : HeapBuf;
  8.                         S : AnyString;
  9.                     var X : ColumnType;
  10.                     var Y : RowType ); external 'FstrHeap.com';